package com.qd.panda.service.card;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.plugins.pagination.Page;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.DateUtil;
import com.cdqidi.util.RedisTemplateUtil;
import com.cdqidi.util.SpringContextHolder;
import com.qd.common.panda.constant.PandaConstant;
import com.qd.common.panda.domain.entity.card.CardInfoDTO;
import com.qd.common.panda.domain.enums.GasStationCompanyNameEnum;
import com.qd.common.sys.enums.BaseTableEnum;
import com.qd.panda.mapper.card.CardInfoMapper;
import com.qd.panda.model.CardInfo;
import com.qd.system.service.dict.MbUtil;
import com.qd.system.service.login.LoginUserService;
import com.qd.system.service.org.OrgService;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.util.*;

import static java.util.stream.Collectors.toList;

/**
 * 卷信息
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class CardInfoService extends BaseService<CardInfoMapper, CardInfo> {

    private static final String PREFIX_ID = "panda_card_info_cardMsgId_{0}";

    private final RedisTemplateUtil<CardInfo> redisTemplateUtil;

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public CardInfoDTO save(CardInfoDTO dto) {
        final CardInfo model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }

    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public CardInfoDTO update(CardInfoDTO dto) {
        final CardInfo historyModel = Optional.ofNullable(getById(dto.getCardMsgId())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final CardInfo model = dtoToModel(dto);
        try {
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 批量添加
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveBatch(List<CardInfo> mList) {
        try {
            if (!super.saveBatch(mList)) {
                throw new ApiException("批量添加失败");
            }
        } finally {
            clearCaches(mList);
        }
    }

    /**
     * 批量更新
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void updateBatchIds(List<CardInfo> mList) {
        final List<String> ids = mList.stream().map(CardInfo::getCardMsgId).collect(toList());
        final List<CardInfo> historyModelList = checkIds(ids);
        try {
            if (!super.updateBatchById(mList)) {
                throw new ApiException("批量更新失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
            ids.clear();
        }
    }

    /**
     * 删除，单个
     *
     * @param cardMsgId 主键
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(String cardMsgId) {
        final CardInfo historyModel = Optional.ofNullable(getById(cardMsgId)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(cardMsgId)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<String> ids) {
        final List<CardInfo> historyModelList = checkIds(ids);
        try {
            if (!super.removeByIds(ids)) {
                throw new ApiException("批量删除失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
        }
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(CardInfoDTO dto) {
        final QueryWrapper<CardInfo> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param cardMsgId 主键
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(String cardMsgId) {
        boolean exists = false;
        if (StringUtils.hasLength(cardMsgId)) {
            final CardInfo model = getById(cardMsgId);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param cardMsgId 主键
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public CardInfo getById(String cardMsgId) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, cardMsgId);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(cardMsgId), CardInfo.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param cardMsgId 主键
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public CardInfoDTO getByIdDto(String cardMsgId) {
        return Optional.ofNullable(getById(cardMsgId)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public CardInfo getOne(CardInfoDTO dto) {
        final QueryWrapper<CardInfo> queryWrapper = createQueryWrapper(dto);
        CardInfo model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public CardInfoDTO getOneDto(CardInfoDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    @Transactional(readOnly = true)
    public List<CardInfo> getList(CardInfoDTO dto) {
        final QueryWrapper<CardInfo> queryWrapper = createQueryWrapper(dto);
        final List<CardInfo> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<CardInfoDTO> getListDto(CardInfoDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 分页数据
     *
     * @param page 分页对象
     * @param dto  查询参数
     * @return 分页信息
     */
    @Transactional(readOnly = true)
    public IPage<CardInfoDTO> page(Page<CardInfo> page, CardInfoDTO dto) {
        final QueryWrapper<CardInfo> queryWrapper = createQueryWrapper(dto, "t1.");
        final IPage<CardInfoDTO> iPage = baseMapper.page(page, queryWrapper);
        queryWrapper.clear();
        return iPage;
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(CardInfo model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getCardMsgId()));
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<CardInfo> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getCardMsgId())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public CardInfoDTO modelToDto(CardInfo model) {
        if (null == model) {
            return null;
        }
        final CardInfoDTO dto = new CardInfoDTO();
        dto.setCardMsgId(model.getCardMsgId());
        dto.setUseStartTime(DateUtil.localDateToStr(model.getUseStartTime()));
        dto.setUseEndTime(DateUtil.localDateToStr(model.getUseEndTime()));
        dto.setVolumeValidity(model.getVolumeValidity());
        dto.setUseRule(model.getUseRule());
        dto.setTitle(model.getTitle());
        dto.setNote(model.getNote());
        dto.setVolumeAmount(model.getVolumeAmount());
        dto.setDiscount(model.getDiscount());
        dto.setDiscountAmount(model.getDiscountAmount());
        dto.setNeedIntegral(model.getNeedIntegral());
        dto.setCardQuantity(model.getCardQuantity());
        dto.setTotalCardQuantity(model.getTotalCardQuantity());
        dto.setAddTime(model.getAddTime());
        dto.setUpdateTime(model.getUpdateTime());
        dto.setUseBrand(model.getUseBrand());
        dto.setPlanId(model.getPlanId());
        dto.setOrgId(model.getOrgId());
        dto.setOperator(model.getOperator());
        dto.setCardType(model.getCardType());
        dto.setDiscountMethod(model.getDiscountMethod());
        buildDisplay(dto);
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public CardInfo dtoToModel(CardInfoDTO dto) {
        if (null == dto) {
            return null;
        }
        final CardInfo model = new CardInfo();
        model.setCardMsgId(dto.getCardMsgId());
        model.setUseStartTime(DateUtil.strToLocalDate(dto.getUseStartTime()));
        model.setUseEndTime(DateUtil.strToLocalDate(dto.getUseEndTime()));
        model.setVolumeValidity(dto.getVolumeValidity());
        model.setUseRule(dto.getUseRule());
        model.setTitle(dto.getTitle());
        model.setNote(dto.getNote());
        model.setVolumeAmount(dto.getVolumeAmount());
        model.setDiscount(dto.getDiscount());
        model.setDiscountAmount(dto.getDiscountAmount());
        model.setNeedIntegral(dto.getNeedIntegral());
        model.setCardQuantity(dto.getCardQuantity());
        model.setTotalCardQuantity(dto.getTotalCardQuantity());
        model.setAddTime(dto.getAddTime());
        model.setUpdateTime(dto.getUpdateTime());
        model.setUseBrand(dto.getUseBrand());
        model.setPlanId(dto.getPlanId());
        model.setOrgId(dto.getOrgId());
        model.setOperator(dto.getOperator());
        model.setCardType(dto.getCardType());
        model.setDiscountMethod(dto.getDiscountMethod());
        return model;
    }

    /**
     * 码表转换
     *
     * @param dto 页面对象
     */
    public void buildDisplay(CardInfoDTO dto) {
        dto.setDiscountMethodDisplay(MbUtil.idToDisplay(dto.getDiscountMethod()));
        dto.setCardTypeDisplay(MbUtil.idToDisplay(dto.getCardType()));
        dto.setOperatorDisplay(SpringContextHolder.getBean(LoginUserService.class).idToDisplay(dto.getOperator()));
        dto.setOrgIdDisplay(SpringContextHolder.getBean(OrgService.class).idToDisplay(dto.getOrgId()));
        dto.setUseBrandDisplay(MbUtil.idToDisplay(dto.getUseBrand()));
        dto.setPlanIdDisplay(SpringContextHolder.getBean(CardPlanService.class).idToDisplay(dto.getPlanId()));
    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<CardInfoDTO> modelToDtoList(List<CardInfo> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<CardInfo> dtoToModelList(List<CardInfoDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<CardInfo> createQueryWrapper(CardInfoDTO dto) {
        return createQueryWrapper(dto, "");
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto        查询参数，不为空的属性会被自动加入
     * @param tableAlias 表别名
     */
    public QueryWrapper<CardInfo> createQueryWrapper(CardInfoDTO dto, String tableAlias) {
        final QueryWrapper<CardInfo> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(tableAlias) && tableAlias.charAt(tableAlias.length() - 1) != '.') {
                tableAlias += ".";
            }
            if (StringUtils.hasLength(dto.getTitle())) {
                queryWrapper.eq(tableAlias + "title", dto.getTitle());
            }
            if (StringUtils.hasLength(dto.getPlanId())) {
                queryWrapper.eq(tableAlias + "plan_id", dto.getPlanId());
            }
            if (StringUtils.hasLength(dto.getCardType())) {
                queryWrapper.eq(tableAlias + "card_type", dto.getCardType());
            }
            if (StringUtils.hasLength(dto.getDiscountMethod())) {
                queryWrapper.eq(tableAlias + "discount_method", dto.getDiscountMethod());
            }
        }
        queryWrapper.orderByDesc(tableAlias + "add_time");
        queryWrapper.orderByDesc(tableAlias + "plan_id");
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<CardInfo> checkIds(Collection<String> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<CardInfo> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<String> dbIds = list.stream().map(CardInfo::getCardMsgId).collect(toList());
        final List<String> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    public void validator(CardInfoDTO cardInfoDTO) {
        if (MbUtil.isNotExists(cardInfoDTO.getCardType(), BaseTableEnum.CARD_TYPE)) {
            throw new ApiException("卷类型值错误");
        }
        if (MbUtil.isNotExists(cardInfoDTO.getDiscountMethod(), BaseTableEnum.DISCOUNT_METHOD)) {
            throw new ApiException("优惠方式错误");
        }
        if (cardInfoDTO.getDiscountMethod().equals(PandaConstant.DISCOUNT_METHOD_1)) {
            //折扣卷
            if (null == cardInfoDTO.getDiscount() || cardInfoDTO.getDiscount() < 0.1) {
                throw new ApiException("折扣不能为空");
            }
            if (null != cardInfoDTO.getDiscountAmount() && cardInfoDTO.getDiscountAmount().longValue() > 0) {
                throw new ApiException("折扣卷不支持填写优惠金额");
            }
            if (null != cardInfoDTO.getVolumeAmount() && cardInfoDTO.getVolumeAmount().longValue() > 0) {
                throw new ApiException("折扣卷不支持填写卷金额");
            }
        }
        if (cardInfoDTO.getDiscountMethod().equals(PandaConstant.DISCOUNT_METHOD_2)) {
            //满减卷
            if (null == cardInfoDTO.getVolumeAmount()) {
                throw new ApiException("卷金额不能为空");
            }
            if (null == cardInfoDTO.getDiscountAmount()) {
                throw new ApiException("优惠金额不能为空");
            }
            if (null != cardInfoDTO.getDiscount() && cardInfoDTO.getDiscount() > 0) {
                throw new ApiException("满减卷不支持填写折扣");
            }
        }
        if (cardInfoDTO.getDiscountMethod().equals(PandaConstant.DISCOUNT_METHOD_3)) {
            //现金券
            if (null == cardInfoDTO.getDiscountAmount()) {
                throw new ApiException("优惠金额不能为空");
            }
            if (null != cardInfoDTO.getDiscount() && cardInfoDTO.getDiscount() > 0) {
                throw new ApiException("现金券不支持填写折扣");
            }
            if (null != cardInfoDTO.getVolumeAmount() && cardInfoDTO.getVolumeAmount().longValue() > 0) {
                throw new ApiException("现金券不支持填写卷金额");
            }
        }
        if (cardInfoDTO.getCardType().equals(PandaConstant.CARD_TYPE_GAS)) {
            if (StringUtils.hasLength(cardInfoDTO.getUseBrand())) {
                if (!StringUtils.hasLength(GasStationCompanyNameEnum.idToDisplay(cardInfoDTO.getUseBrand()))) {
                    throw new ApiException("使用品牌值错误");
                }
            }
        }
        if (!StringUtils.hasLength(cardInfoDTO.getUseBrand())) {
            cardInfoDTO.setUseBrand(PandaConstant.ALL);
        }
    }

    @Transactional(readOnly = true)
    public List<CardInfo> getListByPlanId(String planId) {
        QueryWrapper<CardInfo> queryWrapper = new QueryWrapper<>();
        queryWrapper.eq("plan_id", planId);
        return getBaseMapper().selectList(queryWrapper);
    }

    @Transactional(rollbackFor = Exception.class)
    public void removeByPlanId(String planId) {
        List<CardInfo> listByPlanId = getListByPlanId(planId);
        if (!listByPlanId.isEmpty()) {
            List<String> ids = listByPlanId.stream().map(CardInfo::getCardMsgId).collect(toList());
            removeBatchIds(ids);
        }
    }

    @Transactional(readOnly = true)
    public List<CardInfoDTO> getDtoListByPlanId(String planId) {
        List<CardInfo> listByPlanId = getListByPlanId(planId);
        if (null == listByPlanId || listByPlanId.isEmpty()) {
            return Collections.emptyList();
        }
        return modelToDtoList(listByPlanId);
    }

    @Transactional(readOnly = true)
    public String idToDisplay(String cardMsgId) {
        return Optional.ofNullable(getById(cardMsgId)).map(CardInfo::getTitle).orElse("");
    }
}